module FsUnitSamples

open Xunit
open FsUnit.Xunit

type LightBulb(state) =
   member x.On = state
   override x.ToString() =
       match x.On with
       | true  -> "On"
       | false -> "Off"

[<Fact>]
let ``when I ask whether it is On it answers true.`` ()=
    let lightBulb = new LightBulb(true)
    lightBulb.On |> should be True

[<Fact>]
let ``when I convert it to a string it becomes "On".`` ()=
    let lightBulb = new LightBulb(true)
    string lightBulb |> should equal "On"
